﻿

Namespace ReplyMsg
    Public Class ReplyTextMsg
        Inherits ReplyBaseMsg

        Public Property Content() As String

        Public Overrides ReadOnly Property MsgType() As String
            Get
                Return "text"
            End Get
        End Property

        Protected Overrides Function GetXMLPart() As String
            Return "<Content><![CDATA[" + Me.Content + "]]></Content>"
        End Function
    End Class
End Namespace